home *** CD-ROM | disk | FTP | other *** search
/ Belgian Amiga Club - ADF Collection / BS1 part 60.zip / BS1 part 60 / Karafonts d1.adf / KaraInstallhd1 < prev   
Text File  |  1992-10-30  |  6KB  |  289 lines
  1. echo " "
  2. echo "Kara Fonts Hard Drive Installation Procedure. "
  3. echo " "
  4. echo "Copyright Kara Computer Graphics 1991"
  5. echo " "
  6. echo "Warning: This procedure requires 880 kilobytes (kb) of free"
  7. echo "         space on the hard drive partition of your choice"
  8. echo "         for each installed disk. This program will install"
  9. echo "         up to 4 disks at a time. Please rerun the install"
  10. echo "         program to install more fonts."
  11. echo " "
  12. ask  "Do you want to continue (Y/N)?"
  13. if NOT WARN
  14. endcli > nil:
  15. ENDIF
  16. ECHO " "
  17. echo "Please enter the name of the hard disk partition you want"
  18. echo "to install Kara's disks on. "
  19. echo " "
  20. echo "[example partition names - dh0:, work:, fh1:, Fast:, etc...]  "
  21. echo " "
  22. echo "Enter partition name: " NOLINE
  23. ram:getline >RAM:part
  24. failat 30
  25. CD <RAM:part >NIL: ?
  26. IF WARN
  27. echo " "
  28. echo "Not a valid Hard Disk Partition"
  29. echo "Please try again with a valid partition name..."
  30. echo " "
  31. wait 2
  32. SKIP endit
  33. Endif
  34. ;delete RAM:part
  35.  
  36. failat 30
  37. echo " "
  38. ask  "Do you want to install Kara's AnimFonts (Y/N)?"
  39. if WARN
  40. skip Animfonts
  41. endif
  42.  
  43. failat 30
  44. echo " "
  45. ask  "Do you want to install Kara's Fonts (Y/N)?"
  46. if WARN
  47. skip KaraFonts
  48. endif
  49.  
  50.  
  51. failat 30
  52. echo " "
  53. ask  "Do you want to install Kara's Starfields-Backgrounds (Y/N)?"
  54. if WARN
  55. skip Starfields
  56. else 
  57. skip done2
  58. endif
  59.  
  60.  
  61. lab KaraFonts
  62. ask  "Please insert the first KaraFonts disk in DF0: and press return..."
  63.  if not warn
  64.   if not exists karafonts 
  65.     echo "*NCreating drawer named KaraFonts"
  66.     makedir Karafonts
  67.     copy "df0:brush.info" Karafonts.info
  68.    else
  69.     failat 30
  70.     echo "The Karafonts directory already exists. Install fonts"
  71.     ask "in the existing directory (Y/N)?"
  72.      if NOT WARN
  73.     echo " "
  74.     echo "Installation process aborted"
  75.     echo " "
  76.     wait 2
  77.     endcli > nil:
  78.      endif
  79.   endif
  80. endif
  81.  
  82. echo " "
  83. echo "*NCopying all KaraFonts and Brushes"
  84. echo " "
  85. echo "   This will take a few minutes"
  86. echo " "
  87. echo " "
  88. echo " Installing KaraFonts..."
  89. echo " "
  90. copy "df0:" KaraFonts 
  91. copy "df0:fonts" KaraFonts all 
  92. copy "df0:brush" KaraFonts/brush all 
  93. echo " "
  94.  
  95. ask  "Install another Font disk in the Karafonts drawer (Y/N)?"
  96.    if WARN
  97.     ask  "Please insert the next disk in DF0: and press return..."
  98.     if not warn
  99.     echo " Installing KaraFonts..."
  100.     echo " "
  101.     copy "df0:fonts" karafonts all
  102.     copy "df0:brush" karafonts/brush all 
  103.     echo " "
  104.     ask  "Install another Font disk in the Karafonts drawer (Y/N)?"
  105.      if WARN
  106.     ask  "Please insert the next disk in DF0: and press return..."
  107.     if not warn
  108.     echo " Installing KaraFonts..."
  109.     echo " "
  110.     copy "df0:fonts" karafonts all
  111.     copy "df0:brush" karafonts/brush all 
  112.     echo " "
  113.     echo " "
  114.     ask  "Install another Font disk in the Karafonts drawer (Y/N)?"
  115.      if WARN
  116.     ask  "Please insert the next disk in DF0: and press return..."
  117.     if not warn
  118.     echo " Installing KaraFonts..."
  119.     echo " "
  120.     copy "df0:fonts" karafonts all
  121.     copy "df0:brush" karafonts/brush all 
  122.     echo " "
  123.     skip done1
  124.       endif
  125.     endif
  126.   endif
  127. endif
  128. skip done1
  129.  
  130. lab AnimFonts
  131. ask  "Please insert the first AnimFonts disk in DF0: and press return..."
  132.  if not warn
  133.     if not exists AnimFonts 
  134.     echo "*NCreating drawer named AnimFonts"
  135.     makedir AnimFonts
  136.     copy "df0:brush.info" AnimFonts.info
  137.       else
  138.     failat 30
  139.     echo "The AnimFonts directory already exists. Install fonts"
  140.     ask "in the existing directory (Y/N)?"
  141.      if NOT WARN
  142.     echo " "
  143.     echo "Installation process aborted"
  144.     echo " "
  145.     wait 2
  146.     endcli > nil:
  147.      endif
  148.   endif
  149. endif
  150.  
  151. echo " "
  152. echo "*NCopying all AnimFonts and Brushes"
  153. echo " "
  154. echo "   This will take a few minutes"
  155. echo " "
  156. echo " "
  157. echo " Installing AnimFonts..."
  158. echo " "
  159. copy "df0:animbrush" AnimFonts all
  160. echo " "
  161.  
  162. if not exists karafonts 
  163.     echo "*NCreating drawer named KaraFonts"
  164.     makedir Karafonts
  165.     copy "df0:brush.info" Karafonts.info
  166.      else
  167.     failat 30
  168.     echo "The Karafonts directory already exists. Install fonts"
  169.     ask "in the existing directory (Y/N)?"
  170.       if NOT WARN
  171.     echo " "
  172.     echo "Installation process aborted"
  173.     echo " "
  174.     wait 2
  175.     endcli > nil:
  176.     endif
  177. endif
  178.     echo " Installing KaraFonts..."
  179.     echo " "
  180.     copy "df0:" Karafonts
  181.     copy "df0:fonts" Karafonts all
  182.     copy "df0:brush" Karafonts/brush all 
  183.     echo " "
  184.  
  185. failat 30
  186. ask  "Install another AnimFonts disk in the AnimFonts drawer (Y/N)?"
  187.    if WARN
  188.     ask  "Please insert the next disk in DF0: and press return..."
  189.     if not warn
  190.     echo " Installing AnimFonts..."
  191.     echo " "
  192.     copy "df0:fonts" Karafonts all
  193.     copy "df0:brush" Karafonts/brush all 
  194.         copy "df0:animbrush" AnimFonts all 
  195.     echo " "
  196.     ask  "Install another AnimFonts disk in the AnimFonts drawer (Y/N)?"
  197.      if WARN
  198.     ask  "Please insert the next disk in DF0: and press return..."
  199.       if not warn
  200.     echo " Installing AnimFonts..."
  201.     echo " "
  202.     copy "df0:fonts" Karafonts all
  203.     copy "df0:brush" Karafonts/brush all 
  204.       copy "df0:animbrush" AnimFonts all 
  205.     echo " "
  206.     skip done
  207.       endif
  208.     endif
  209.   endif
  210. endif
  211. skip done
  212.  
  213. lab Starfields
  214. failat 30
  215. ask  "Please insert the first disk in DF0: and press return..."
  216.  if not warn
  217.   if not exists Starfields-Backgrounds 
  218.     echo "*NCreating drawer named Starfields-Backgrounds"
  219.     makedir Starfields-Backgrounds
  220.     copy "df0:brush.info" Starfields-Backgrounds.info
  221.     else
  222.     failat 30
  223.     echo "The Starfields-Backgrounds directory already exists."
  224.     ask "Install disk in the existing directory (Y/N)?"
  225.      if NOT WARN
  226.     echo " "
  227.     echo "Installation process aborted"
  228.     echo " "
  229.     wait 2
  230.     endcli > nil:
  231.      endif
  232.   endif
  233. endif
  234.  
  235. echo " "
  236. echo "*NCopying all files."
  237. echo " "
  238. echo "   This will take a few minutes"
  239. echo " "
  240. echo " "
  241. echo " Installing Starfields-Backgrounds..."
  242. echo " "
  243. copy "df0:" Starfields-Backgrounds 
  244. copy "df0:brush" Starfields-Backgrounds/brush all 
  245. echo " "
  246.  
  247. failat 30
  248. ask  "Install another Starfields-Backgrounds disk (Y/N)?"
  249.    if WARN
  250.     ask  "Please insert the next disk in DF0: and press return..."
  251.     if not warn
  252.     echo " Installing Starfields-Backgrounds..."
  253.     echo " "
  254.     copy "df0:" Starfields-Backgrounds all
  255.     copy "df0:brush" Starfields-Backgrounds/brush all 
  256.     echo " "
  257.     skip done
  258.     endif
  259.   endif
  260. skip done
  261.  
  262. lab done
  263. echo " "
  264. echo "Installation process completed"
  265. echo " "
  266. skip endit
  267.  
  268. lab done1
  269. echo " "
  270. echo "Running fixfonts..."
  271. echo " "
  272. Assign fonts: karafonts
  273. sys:system/fixfonts 
  274. Assign Fonts: sys:fonts
  275. echo " "
  276. echo "Installation process completed."
  277. echo "To install more fonts double-click HD-Install again."
  278. echo " "
  279. skip endit
  280.  
  281. lab done2
  282. echo " "
  283. echo "No Installation Requested...Installation Aborted."
  284. echo " "
  285.  
  286. lab endit
  287. Wait 3
  288. endcli >nil:
  289.